perm filename ZOR21.DAT[SCR,LCS]3 blob
sn#219677 filedate 1976-06-17 generic text, type T, neo UTF8
RCDFLG←-1;
< ZOR21.DAT -- RANDOM NUMBER= 133
PLAY;
CLAR 0.00 0.10 A/4
;PRINT(P1);< CLAR 1
CLAR 0.10 0.10 CS/2
;PRINT(P1);< CLAR 2
CLAR 0.20 0.10 AS/4
;PRINT(P1);< CLAR 3
CLAR 0.30 0.10 B/4
;PRINT(P1);< CLAR 4
CLAR 0.40 0.10 G/4
;PRINT(P1);< CLAR 5
CLAR 0.50 0.10 D/4
;PRINT(P1);< CLAR 6
CLAR 0.60 0.10 E/8
;PRINT(P1);< CLAR 7
CLAR 0.70 0.10 F/4
;PRINT(P1);< CLAR 8
CLAR 0.80 0.10 GS/4
;PRINT(P1);< CLAR 9
CLAR 0.90 0.10 F/8
;PRINT(P1);< CLAR 10
CLAR 1.00 0.10 C/2
;PRINT(P1);< CLAR 11
CLAR 1.10 0.10 D/2
;PRINT(P1);< CLAR 12
CLAR 1.20 0.10 D/4
;PRINT(P1);< CLAR 13
CLAR 1.30 0.10 D
;PRINT(P1);< CLAR 14
CLAR 1.40 0.10 CS/4
;PRINT(P1);< CLAR 15
CLAR 1.50 0.10 C/4
;PRINT(P1);< CLAR 16
CLAR 1.60 0.10 A/4
;PRINT(P1);< CLAR 17
CLAR 1.70 0.10 F/2
;PRINT(P1);< CLAR 18
CLAR 1.80 0.10 A
;PRINT(P1);< CLAR 19
CLAR 1.90 0.10 F/2
;PRINT(P1);< CLAR 20
CLAR 2.00 0.10 F/2
;PRINT(P1);< CLAR 21
CLAR 2.10 0.10 B/8
;PRINT(P1);< CLAR 22
CLAR 2.20 0.10 AS/2
;PRINT(P1);< CLAR 23
CLAR 2.30 0.10 DS
;PRINT(P1);< CLAR 24
CLAR 2.40 0.10 B/4
;PRINT(P1);< CLAR 25
CLAR 2.50 0.10 AS/8
;PRINT(P1);< CLAR 26
CLAR 2.60 0.10 C/2
;PRINT(P1);< CLAR 27
CLAR 2.70 0.10 CS/2
;PRINT(P1);< CLAR 28
CLAR 2.80 0.10 F
;PRINT(P1);< CLAR 29
CLAR 2.90 0.10 A*2
;PRINT(P1);< CLAR 30
CLAR 3.00 0.10 D*4
;PRINT(P1);< CLAR 31
CLAR 3.10 0.10 D*4
;PRINT(P1);< CLAR 32
CLAR 3.20 0.10 A*2
;PRINT(P1);< CLAR 33
CLAR 3.30 0.10 E*4
;PRINT(P1);< CLAR 34
CLAR 3.40 0.10 FS*4
;PRINT(P1);< CLAR 35
CLAR 3.50 0.10 D*4
;PRINT(P1);< CLAR 36
CLAR 3.60 0.10 CS*4
;PRINT(P1);< CLAR 37
CLAR 3.70 0.10 G*2
;PRINT(P1);< CLAR 38
CLAR 3.80 0.10 D*4
;PRINT(P1);< CLAR 39
CLAR 3.90 0.10 D*4
;PRINT(P1);< CLAR 40
CLAR 4.00 0.10 GS*2
;PRINT(P1);< CLAR 41
CLAR 4.10 0.10 E*4
;PRINT(P1);< CLAR 42
CLAR 4.20 0.10 FS*4
;PRINT(P1);< CLAR 43
CLAR 4.30 0.10 DS*4
;PRINT(P1);< CLAR 44
CLAR 4.40 0.10 D*4
;PRINT(P1);< CLAR 45
CLAR 4.50 0.10 A*2
;PRINT(P1);< CLAR 46
CLAR 4.60 0.10 E*4
;PRINT(P1);< CLAR 47
CLAR 4.70 0.10 G*4
;PRINT(P1);< CLAR 48
CLAR 4.80 0.10 DS*4
;PRINT(P1);< CLAR 49
CLAR 4.90 0.10 D*4
;PRINT(P1);< CLAR 50
CLAR 5.00 0.10 AS*2
;PRINT(P1);< CLAR 51
CLAR 5.10 0.10 F*4
;PRINT(P1);< CLAR 52
CLAR 5.20 0.10 GS*2
;PRINT(P1);< CLAR 53
CLAR 5.30 0.10 FS*4
;PRINT(P1);< CLAR 54
CLAR 5.40 0.10 G*4
;PRINT(P1);< CLAR 55
CLAR 5.50 0.10 FS*4
;PRINT(P1);< CLAR 56
CLAR 5.60 0.10 FS*4
;PRINT(P1);< CLAR 57
CLAR 5.70 0.10 F*4
;PRINT(P1);< CLAR 58
CLAR 5.80 0.10 E*4
;PRINT(P1);< CLAR 59
CLAR 5.90 0.10 CS*4
;PRINT(P1);< CLAR 60
CLAR 6.00 0.10 A*4
;PRINT(P1);< CLAR 61
CLAR 6.10 0.10 D*8
;PRINT(P1);< CLAR 62
CLAR 6.20 0.10 DS*8
;PRINT(P1);< CLAR 63
CLAR 6.30 0.10 A*4
;PRINT(P1);< CLAR 64
CLAR 6.40 0.10 FS*4
;PRINT(P1);< CLAR 65
CLAR 6.50 0.10 AS*2
;PRINT(P1);< CLAR 66
CLAR 6.60 0.10 F*4
;PRINT(P1);< CLAR 67
CLAR 6.70 0.10 FS*4
;PRINT(P1);< CLAR 68
CLAR 6.80 0.10 CS*4
;PRINT(P1);< CLAR 69
CLAR 6.90 0.10 B*2
;PRINT(P1);< CLAR 70
CLAR 7.00 0.10 F*2
;PRINT(P1);< CLAR 71
CLAR 7.10 0.10 AS
;PRINT(P1);< CLAR 72
CLAR 7.20 0.10 F*2
;PRINT(P1);< CLAR 73
CLAR 7.30 0.10 D
;PRINT(P1);< CLAR 74
CLAR 7.40 0.10 CS*2
;PRINT(P1);< CLAR 75
CLAR 7.50 0.10 B
;PRINT(P1);< CLAR 76
CLAR 7.60 0.10 F
;PRINT(P1);< CLAR 77
CLAR 7.70 0.10 AS/2
;PRINT(P1);< CLAR 78
CLAR 7.80 0.10 G
;PRINT(P1);< CLAR 79
CLAR 7.90 0.10 D/2
;PRINT(P1);< CLAR 80
CLAR 8.00 0.10 F
;PRINT(P1);< CLAR 81
CLAR 8.10 0.10 E
;PRINT(P1);< CLAR 82
CLAR 8.20 0.10 C
;PRINT(P1);< CLAR 83
CLAR 8.30 0.10 AS/2
;PRINT(P1);< CLAR 84
CLAR 8.40 0.10 F/2
;PRINT(P1);< CLAR 85
CLAR 8.50 0.10 B/4
;PRINT(P1);< CLAR 86
CLAR 8.60 0.10 D/4
;PRINT(P1);< CLAR 87
CLAR 8.70 0.10 CS/2
;PRINT(P1);< CLAR 88
CLAR 8.80 0.10 F/8
;PRINT(P1);< CLAR 89
CLAR 8.90 0.10 B/4
;PRINT(P1);< CLAR 90
CLAR 9.00 0.10 C/4
;PRINT(P1);< CLAR 91
CLAR 9.10 0.10 C/4
;PRINT(P1);< CLAR 92
CLAR 9.20 0.10 C/4
;PRINT(P1);< CLAR 93
CLAR 9.30 0.10 C/4
;PRINT(P1);< CLAR 94
CLAR 9.40 0.10 C/4
;PRINT(P1);< CLAR 95
CLAR 9.50 0.10 C/4
;PRINT(P1);< CLAR 96
CLAR 9.60 0.10 C/4
;PRINT(P1);< CLAR 97
CLAR 9.70 0.10 C/4
;PRINT(P1);< CLAR 98
CLAR 9.80 0.10 C/4
;PRINT(P1);< CLAR 99
CLAR 9.90 0.10 C/4
;PRINT(P1);< CLAR 100
FINISH; < ZOR21.DAT